/ Komputer for Alle 2001 #9 / CD 9 (Black) - 2001.iso / Pinball / System / UBrowser.u / UBrowserServerList_UBrowserMainClientWindow_ScriptText.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 6e 4b 2f 2f 3d 3d 3d 3d |........|nK//====|
|00000010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000020| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 0a 2f 2f 20 55 42 |========|=..// UB|
|00000060| 72 6f 77 73 65 72 4d 61 | 69 6e 43 6c 69 65 6e 74 |rowserMa|inClient|
|00000070| 57 69 6e 64 6f 77 20 2d | 20 54 68 65 20 6d 61 69 |Window -| The mai|
|00000080| 6e 20 63 6c 69 65 6e 74 | 20 61 72 65 61 0d 0a 2f |n client| area../|
|00000090| 2f 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |/=======|========|
|000000a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0d 0a |========|======..|
|000000e0| 63 6c 61 73 73 20 55 42 | 72 6f 77 73 65 72 4d 61 |class UB|rowserMa|
|000000f0| 69 6e 43 6c 69 65 6e 74 | 57 69 6e 64 6f 77 20 65 |inClient|Window e|
|00000100| 78 74 65 6e 64 73 20 55 | 57 69 6e 64 6f 77 43 6c |xtends U|WindowCl|
|00000110| 69 65 6e 74 57 69 6e 64 | 6f 77 3b 0d 0a 0d 0a 76 |ientWind|ow;....v|
|00000120| 61 72 20 67 6c 6f 62 61 | 6c 63 6f 6e 66 69 67 20 |ar globa|lconfig |
|00000130| 73 74 72 69 6e 67 09 09 | 4c 41 4e 54 61 62 4e 61 |string..|LANTabNa|
|00000140| 6d 65 3b 0d 0a 76 61 72 | 20 67 6c 6f 62 61 6c 63 |me;..var| globalc|
|00000150| 6f 6e 66 69 67 20 6e 61 | 6d 65 20 53 65 72 76 65 |onfig na|me Serve|
|00000160| 72 4c 69 73 74 4e 61 6d | 65 73 5b 35 30 5d 3b 0d |rListNam|es[50];.|
|00000170| 0a 76 61 72 20 67 6c 6f | 62 61 6c 63 6f 6e 66 69 |.var glo|balconfi|
|00000180| 67 20 62 6f 6f 6c 20 62 | 4b 65 65 70 4d 61 73 74 |g bool b|KeepMast|
|00000190| 65 72 53 65 72 76 65 72 | 3b 0d 0a 0d 0a 76 61 72 |erServer|;....var|
|000001a0| 20 55 57 69 6e 64 6f 77 | 50 61 67 65 43 6f 6e 74 | UWindow|PageCont|
|000001b0| 72 6f 6c 09 09 50 61 67 | 65 43 6f 6e 74 72 6f 6c |rol..Pag|eControl|
|000001c0| 3b 0d 0a 76 61 72 20 55 | 57 69 6e 64 6f 77 50 61 |;..var U|WindowPa|
|000001d0| 67 65 43 6f 6e 74 72 6f | 6c 50 61 67 65 09 46 61 |geContro|lPage.Fa|
|000001e0| 76 6f 72 69 74 65 73 2c | 20 49 52 43 2c 20 4d 4f |vorites,| IRC, MO|
|000001f0| 54 44 3b 0d 0a 76 61 72 | 20 6c 6f 63 61 6c 69 7a |TD;..var| localiz|
|00000200| 65 64 20 73 74 72 69 6e | 67 09 09 46 61 76 6f 72 |ed strin|g..Favor|
|00000210| 69 74 65 73 4e 61 6d 65 | 2c 20 49 52 43 4e 61 6d |itesName|, IRCNam|
|00000220| 65 2c 20 4d 4f 54 44 4e | 61 6d 65 3b 0d 0a 76 61 |e, MOTDN|ame;..va|
|00000230| 72 20 73 74 72 69 6e 67 | 09 09 09 09 09 53 65 72 |r string|.....Ser|
|00000240| 76 65 72 4c 69 73 74 57 | 69 6e 64 6f 77 43 6c 61 |verListW|indowCla|
|00000250| 73 73 3b 0d 0a 76 61 72 | 20 73 74 72 69 6e 67 09 |ss;..var| string.|
|00000260| 09 09 09 09 46 61 76 6f | 72 69 74 65 53 65 72 76 |....Favo|riteServ|
|00000270| 65 72 73 43 6c 61 73 73 | 3b 0d 0a 76 61 72 20 73 |ersClass|;..var s|
|00000280| 74 72 69 6e 67 09 09 09 | 09 09 55 70 64 61 74 65 |tring...|..Update|
|00000290| 53 65 72 76 65 72 43 6c | 61 73 73 3b 0d 0a 76 61 |ServerCl|ass;..va|
|000002a0| 72 20 55 57 69 6e 64 6f | 77 50 61 67 65 43 6f 6e |r UWindo|wPageCon|
|000002b0| 74 72 6f 6c 50 61 67 65 | 09 4c 41 4e 50 61 67 65 |trolPage|.LANPage|
|000002c0| 3b 0d 0a 76 61 72 20 55 | 57 69 6e 64 6f 77 54 61 |;..var U|WindowTa|
|000002d0| 62 43 6f 6e 74 72 6f 6c | 49 74 65 6d 09 50 61 67 |bControl|Item.Pag|
|000002e0| 65 42 65 66 6f 72 65 4c | 41 4e 3b 0d 0a 76 61 72 |eBeforeL|AN;..var|
|000002f0| 20 55 42 72 6f 77 73 65 | 72 53 65 72 76 65 72 4c | UBrowse|rServerL|
|00000300| 69 73 74 57 69 6e 64 6f | 77 20 46 61 63 74 6f 72 |istWindo|w Factor|
|00000310| 79 57 69 6e 64 6f 77 73 | 5b 35 30 5d 3b 0d 0a 76 |yWindows|[50];..v|
|00000320| 61 72 20 55 42 72 6f 77 | 73 65 72 49 6e 66 6f 57 |ar UBrow|serInfoW|
|00000330| 69 6e 64 6f 77 09 09 49 | 6e 66 6f 57 69 6e 64 6f |indow..I|nfoWindo|
|00000340| 77 3b 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 43 |w;....fu|nction C|
|00000350| 72 65 61 74 65 64 28 29 | 20 0d 0a 7b 0d 0a 09 6c |reated()| ..{...l|
|00000360| 6f 63 61 6c 20 69 6e 74 | 20 69 2c 20 6a 3b 0d 0a |ocal int| i, j;..|
|00000370| 09 6c 6f 63 61 6c 20 55 | 57 69 6e 64 6f 77 50 61 |.local U|WindowPa|
|00000380| 67 65 43 6f 6e 74 72 6f | 6c 50 61 67 65 20 50 3b |geContro|lPage P;|
|00000390| 0d 0a 09 6c 6f 63 61 6c | 20 55 42 72 6f 77 73 65 |...local| UBrowse|
|000003a0| 72 53 65 72 76 65 72 4c | 69 73 74 57 69 6e 64 6f |rServerL|istWindo|
|000003b0| 77 20 57 3b 0d 0a 09 6c | 6f 63 61 6c 20 63 6c 61 |w W;...l|ocal cla|
|000003c0| 73 73 3c 55 42 72 6f 77 | 73 65 72 53 65 72 76 65 |ss<UBrow|serServe|
|000003d0| 72 4c 69 73 74 57 69 6e | 64 6f 77 3e 20 43 3b 0d |rListWin|dow> C;.|
|000003e0| 0a 09 6c 6f 63 61 6c 20 | 63 6c 61 73 73 3c 55 42 |..local |class<UB|
|000003f0| 72 6f 77 73 65 72 46 61 | 76 6f 72 69 74 65 53 65 |rowserFa|voriteSe|
|00000400| 72 76 65 72 73 3e 20 46 | 43 3b 0d 0a 09 6c 6f 63 |rvers> F|C;...loc|
|00000410| 61 6c 20 63 6c 61 73 73 | 3c 55 42 72 6f 77 73 65 |al class|<UBrowse|
|00000420| 72 55 70 64 61 74 65 53 | 65 72 76 65 72 57 69 6e |rUpdateS|erverWin|
|00000430| 64 6f 77 3e 20 4d 43 3b | 0d 0a 09 6c 6f 63 61 6c |dow> MC;|...local|
|00000440| 20 73 74 72 69 6e 67 20 | 4e 65 78 74 57 69 6e 64 | string |NextWind|
|00000450| 6f 77 43 6c 61 73 73 2c | 20 4e 65 78 74 57 69 6e |owClass,| NextWin|
|00000460| 64 6f 77 44 65 73 63 3b | 0d 0a 0d 0a 09 53 75 70 |dowDesc;|.....Sup|
|00000470| 65 72 2e 43 72 65 61 74 | 65 64 28 29 3b 0d 0a 0d |er.Creat|ed();...|
|00000480| 0a 09 49 6e 66 6f 57 69 | 6e 64 6f 77 20 3d 20 55 |..InfoWi|ndow = U|
|00000490| 42 72 6f 77 73 65 72 49 | 6e 66 6f 57 69 6e 64 6f |BrowserI|nfoWindo|
|000004a0| 77 28 52 6f 6f 74 2e 43 | 72 65 61 74 65 57 69 6e |w(Root.C|reateWin|
|000004b0| 64 6f 77 28 63 6c 61 73 | 73 27 55 42 72 6f 77 73 |dow(clas|s'UBrows|
|000004c0| 65 72 49 6e 66 6f 57 69 | 6e 64 6f 77 27 2c 20 31 |erInfoWi|ndow', 1|
|000004d0| 30 2c 20 34 30 2c 20 33 | 31 30 2c 20 31 37 30 29 |0, 40, 3|10, 170)|
|000004e0| 29 3b 0d 0a 09 49 6e 66 | 6f 57 69 6e 64 6f 77 2e |);...Inf|oWindow.|
|000004f0| 48 69 64 65 57 69 6e 64 | 6f 77 28 29 3b 0d 0a 0d |HideWind|ow();...|
|00000500| 0a 09 50 61 67 65 43 6f | 6e 74 72 6f 6c 20 3d 20 |..PageCo|ntrol = |
|00000510| 55 57 69 6e 64 6f 77 50 | 61 67 65 43 6f 6e 74 72 |UWindowP|ageContr|
|00000520| 6f 6c 28 43 72 65 61 74 | 65 57 69 6e 64 6f 77 28 |ol(Creat|eWindow(|
|00000530| 63 6c 61 73 73 27 55 57 | 69 6e 64 6f 77 50 61 67 |class'UW|indowPag|
|00000540| 65 43 6f 6e 74 72 6f 6c | 27 2c 20 30 2c 20 30 2c |eControl|', 0, 0,|
|00000550| 20 57 69 6e 57 69 64 74 | 68 2c 20 57 69 6e 48 65 | WinWidt|h, WinHe|
|00000560| 69 67 68 74 29 29 3b 0d | 0a 09 50 61 67 65 43 6f |ight));.|..PageCo|
|00000570| 6e 74 72 6f 6c 2e 53 65 | 74 4d 75 6c 74 69 4c 69 |ntrol.Se|tMultiLi|
|00000580| 6e 65 28 54 72 75 65 29 | 3b 0d 0a 0d 0a 09 2f 2f |ne(True)|;.....//|
|00000590| 20 41 64 64 20 4d 4f 54 | 44 0d 0a 09 4d 43 20 3d | Add MOT|D...MC =|
|000005a0| 20 63 6c 61 73 73 3c 55 | 42 72 6f 77 73 65 72 55 | class<U|BrowserU|
|000005b0| 70 64 61 74 65 53 65 72 | 76 65 72 57 69 6e 64 6f |pdateSer|verWindo|
|000005c0| 77 3e 28 44 79 6e 61 6d | 69 63 4c 6f 61 64 4f 62 |w>(Dynam|icLoadOb|
|000005d0| 6a 65 63 74 28 55 70 64 | 61 74 65 53 65 72 76 65 |ject(Upd|ateServe|
|000005e0| 72 43 6c 61 73 73 2c 20 | 63 6c 61 73 73 27 43 6c |rClass, |class'Cl|
|000005f0| 61 73 73 27 29 29 3b 0d | 0a 09 4d 4f 54 44 20 3d |ass'));.|..MOTD =|
|00000600| 20 50 61 67 65 43 6f 6e | 74 72 6f 6c 2e 41 64 64 | PageCon|trol.Add|
|00000610| 50 61 67 65 28 4d 4f 54 | 44 4e 61 6d 65 2c 20 4d |Page(MOT|DName, M|
|00000620| 43 29 3b 0d 0a 0d 0a 09 | 49 52 43 20 3d 20 50 61 |C);.....|IRC = Pa|
|00000630| 67 65 43 6f 6e 74 72 6f | 6c 2e 41 64 64 50 61 67 |geContro|l.AddPag|
|00000640| 65 28 49 52 43 4e 61 6d | 65 2c 20 63 6c 61 73 73 |e(IRCNam|e, class|
|00000650| 27 55 42 72 6f 77 73 65 | 72 49 52 43 57 69 6e 64 |'UBrowse|rIRCWind|
|00000660| 6f 77 27 29 3b 0d 0a 0d | 0a 09 2f 2f 20 41 64 64 |ow');...|..// Add|
|00000670| 20 66 61 76 6f 72 69 74 | 65 73 0d 0a 09 46 43 20 | favorit|es...FC |
|00000680| 3d 20 63 6c 61 73 73 3c | 55 42 72 6f 77 73 65 72 |= class<|UBrowser|
|00000690| 46 61 76 6f 72 69 74 65 | 53 65 72 76 65 72 73 3e |Favorite|Servers>|
|000006a0| 28 44 79 6e 61 6d 69 63 | 4c 6f 61 64 4f 62 6a 65 |(Dynamic|LoadObje|
|000006b0| 63 74 28 46 61 76 6f 72 | 69 74 65 53 65 72 76 65 |ct(Favor|iteServe|
|000006c0| 72 73 43 6c 61 73 73 2c | 20 63 6c 61 73 73 27 43 |rsClass,| class'C|
|000006d0| 6c 61 73 73 27 29 29 3b | 0d 0a 09 46 61 76 6f 72 |lass'));|...Favor|
|000006e0| 69 74 65 73 20 3d 20 50 | 61 67 65 43 6f 6e 74 72 |ites = P|ageContr|
|000006f0| 6f 6c 2e 41 64 64 50 61 | 67 65 28 46 61 76 6f 72 |ol.AddPa|ge(Favor|
|00000700| 69 74 65 73 4e 61 6d 65 | 2c 20 46 43 29 3b 0d 0a |itesName|, FC);..|
|00000710| 0d 0a 09 43 20 3d 20 63 | 6c 61 73 73 3c 55 42 72 |...C = c|lass<UBr|
|00000720| 6f 77 73 65 72 53 65 72 | 76 65 72 4c 69 73 74 57 |owserSer|verListW|
|00000730| 69 6e 64 6f 77 3e 28 44 | 79 6e 61 6d 69 63 4c 6f |indow>(D|ynamicLo|
|00000740| 61 64 4f 62 6a 65 63 74 | 28 53 65 72 76 65 72 4c |adObject|(ServerL|
|00000750| 69 73 74 57 69 6e 64 6f | 77 43 6c 61 73 73 2c 20 |istWindo|wClass, |
|00000760| 63 6c 61 73 73 27 43 6c | 61 73 73 27 29 29 3b 0d |class'Cl|ass'));.|
|00000770| 0a 0d 0a 09 66 6f 72 28 | 69 3d 30 3b 20 69 3c 35 |....for(|i=0; i<5|
|00000780| 30 3b 20 69 2b 2b 29 0d | 0a 09 7b 0d 0a 09 09 69 |0; i++).|..{....i|
|00000790| 66 28 53 65 72 76 65 72 | 4c 69 73 74 4e 61 6d 65 |f(Server|ListName|
|000007a0| 73 5b 69 5d 20 3d 3d 20 | 27 27 29 0d 0a 09 09 09 |s[i] == |'').....|
|000007b0| 62 72 65 61 6b 3b 0d 0a | 0d 0a 09 09 50 20 3d 20 |break;..|....P = |
|000007c0| 50 61 67 65 43 6f 6e 74 | 72 6f 6c 2e 41 64 64 50 |PageCont|rol.AddP|
|000007d0| 61 67 65 28 22 22 2c 20 | 43 2c 20 53 65 72 76 65 |age("", |C, Serve|
|000007e0| 72 4c 69 73 74 4e 61 6d | 65 73 5b 69 5d 29 3b 0d |rListNam|es[i]);.|
|000007f0| 0a 09 09 69 66 28 73 74 | 72 69 6e 67 28 53 65 72 |...if(st|ring(Ser|
|00000800| 76 65 72 4c 69 73 74 4e | 61 6d 65 73 5b 69 5d 29 |verListN|ames[i])|
|00000810| 20 7e 3d 20 4c 41 4e 54 | 61 62 4e 61 6d 65 29 0d | ~= LANT|abName).|
|00000820| 0a 09 09 09 4c 41 4e 50 | 61 67 65 20 3d 20 50 3b |....LANP|age = P;|
|00000830| 0d 0a 0d 0a 09 09 57 20 | 3d 20 55 42 72 6f 77 73 |......W |= UBrows|
|00000840| 65 72 53 65 72 76 65 72 | 4c 69 73 74 57 69 6e 64 |erServer|ListWind|
|00000850| 6f 77 28 50 2e 50 61 67 | 65 29 3b 0d 0a 09 09 69 |ow(P.Pag|e);....i|
|00000860| 66 28 57 2e 62 48 69 64 | 64 65 6e 29 0d 0a 09 09 |f(W.bHid|den)....|
|00000870| 09 50 61 67 65 43 6f 6e | 74 72 6f 6c 2e 44 65 6c |.PageCon|trol.Del|
|00000880| 65 74 65 50 61 67 65 28 | 50 29 3b 0d 0a 0d 0a 09 |etePage(|P);.....|
|00000890| 09 69 66 28 57 2e 53 65 | 72 76 65 72 4c 69 73 74 |.if(W.Se|rverList|
|000008a0| 54 69 74 6c 65 20 21 3d | 20 22 22 29 0d 0a 09 09 |Title !=| "")....|
|000008b0| 09 50 2e 53 65 74 43 61 | 70 74 69 6f 6e 28 57 2e |.P.SetCa|ption(W.|
|000008c0| 53 65 72 76 65 72 4c 69 | 73 74 54 69 74 6c 65 29 |ServerLi|stTitle)|
|000008d0| 3b 0d 0a 09 09 65 6c 73 | 65 0d 0a 09 09 09 50 2e |;....els|e.....P.|
|000008e0| 53 65 74 43 61 70 74 69 | 6f 6e 28 4c 6f 63 61 6c |SetCapti|on(Local|
|000008f0| 69 7a 65 28 22 53 65 72 | 76 65 72 4c 69 73 74 54 |ize("Ser|verListT|
|00000900| 69 74 6c 65 73 22 2c 20 | 73 74 72 69 6e 67 28 53 |itles", |string(S|
|00000910| 65 72 76 65 72 4c 69 73 | 74 4e 61 6d 65 73 5b 69 |erverLis|tNames[i|
|00000920| 5d 29 2c 20 22 55 42 72 | 6f 77 73 65 72 22 29 29 |]), "UBr|owser"))|
|00000930| 3b 0d 0a 0d 0a 09 09 46 | 61 63 74 6f 72 79 57 69 |;......F|actoryWi|
|00000940| 6e 64 6f 77 73 5b 69 5d | 20 3d 20 57 3b 0d 0a 09 |ndows[i]| = W;...|
|00000950| 7d 0d 0a 0d 0a 09 2f 2f | 20 4c 6f 61 64 20 63 75 |}.....//| Load cu|
|00000960| 73 74 6f 6d 20 55 42 72 | 6f 77 73 65 72 20 70 61 |stom UBr|owser pa|
|00000970| 67 65 73 0d 0a 09 69 66 | 28 69 20 3c 20 35 30 29 |ges...if|(i < 50)|
|00000980| 0d 0a 09 7b 0d 0a 09 09 | 6a 20 3d 20 30 3b 0d 0a |...{....|j = 0;..|
|00000990| 09 09 47 65 74 50 6c 61 | 79 65 72 4f 77 6e 65 72 |..GetPla|yerOwner|
|000009a0| 28 29 2e 47 65 74 4e 65 | 78 74 49 6e 74 44 65 73 |().GetNe|xtIntDes|
|000009b0| 63 28 53 65 72 76 65 72 | 4c 69 73 74 57 69 6e 64 |c(Server|ListWind|
|000009c0| 6f 77 43 6c 61 73 73 2c | 20 6a 2c 20 4e 65 78 74 |owClass,| j, Next|
|000009d0| 57 69 6e 64 6f 77 43 6c | 61 73 73 2c 20 4e 65 78 |WindowCl|ass, Nex|
|000009e0| 74 57 69 6e 64 6f 77 44 | 65 73 63 29 3b 20 0d 0a |tWindowD|esc); ..|
|000009f0| 09 09 77 68 69 6c 65 28 | 20 4e 65 78 74 57 69 6e |..while(| NextWin|
|00000a00| 64 6f 77 43 6c 61 73 73 | 20 21 3d 20 22 22 20 26 |dowClass| != "" &|
|00000a10| 26 20 69 20 3c 20 35 30 | 20 29 0d 0a 09 09 7b 0d |& i < 50| )....{.|
|00000a20| 0a 09 09 09 43 20 3d 20 | 63 6c 61 73 73 3c 55 42 |....C = |class<UB|
|00000a30| 72 6f 77 73 65 72 53 65 | 72 76 65 72 4c 69 73 74 |rowserSe|rverList|
|00000a40| 57 69 6e 64 6f 77 3e 28 | 44 79 6e 61 6d 69 63 4c |Window>(|DynamicL|
|00000a50| 6f 61 64 4f 62 6a 65 63 | 74 28 4e 65 78 74 57 69 |oadObjec|t(NextWi|
|00000a60| 6e 64 6f 77 43 6c 61 73 | 73 2c 20 63 6c 61 73 73 |ndowClas|s, class|
|00000a70| 27 43 6c 61 73 73 27 29 | 29 3b 0d 0a 09 09 09 69 |'Class')|);.....i|
|00000a80| 66 28 20 43 20 21 3d 20 | 4e 6f 6e 65 20 29 0d 0a |f( C != |None )..|
|00000a90| 09 09 09 7b 0d 0a 09 09 | 09 09 53 65 72 76 65 72 |...{....|..Server|
|00000aa0| 4c 69 73 74 4e 61 6d 65 | 73 5b 69 5d 20 3d 20 27 |ListName|s[i] = '|
|00000ab0| 27 3b 0d 0a 09 09 09 09 | 50 20 3d 20 50 61 67 65 |';......|P = Page|
|00000ac0| 43 6f 6e 74 72 6f 6c 2e | 41 64 64 50 61 67 65 28 |Control.|AddPage(|
|00000ad0| 22 22 2c 20 43 29 3b 0d | 0a 09 09 09 09 57 20 3d |"", C);.|.....W =|
|00000ae0| 20 55 42 72 6f 77 73 65 | 72 53 65 72 76 65 72 4c | UBrowse|rServerL|
|00000af0| 69 73 74 57 69 6e 64 6f | 77 28 50 2e 50 61 67 65 |istWindo|w(P.Page|
|00000b00| 29 3b 0d 0a 09 09 09 09 | 69 66 28 57 2e 62 48 69 |);......|if(W.bHi|
|00000b10| 64 64 65 6e 29 0d 0a 09 | 09 09 09 09 50 61 67 65 |dden)...|....Page|
|00000b20| 43 6f 6e 74 72 6f 6c 2e | 44 65 6c 65 74 65 50 61 |Control.|DeletePa|
|00000b30| 67 65 28 50 29 3b 0d 0a | 09 09 09 09 69 66 28 57 |ge(P);..|....if(W|
|00000b40| 2e 53 65 72 76 65 72 4c | 69 73 74 54 69 74 6c 65 |.ServerL|istTitle|
|00000b50| 20 21 3d 20 22 22 29 0d | 0a 09 09 09 09 09 50 2e | != "").|......P.|
|00000b60| 53 65 74 43 61 70 74 69 | 6f 6e 28 57 2e 53 65 72 |SetCapti|on(W.Ser|
|00000b70| 76 65 72 4c 69 73 74 54 | 69 74 6c 65 29 3b 0d 0a |verListT|itle);..|
|00000b80| 09 09 09 09 65 6c 73 65 | 0d 0a 09 09 09 09 09 50 |....else|.......P|
|00000b90| 2e 53 65 74 43 61 70 74 | 69 6f 6e 28 4e 65 78 74 |.SetCapt|ion(Next|
|00000ba0| 57 69 6e 64 6f 77 44 65 | 73 63 29 3b 0d 0a 09 09 |WindowDe|sc);....|
|00000bb0| 09 09 46 61 63 74 6f 72 | 79 57 69 6e 64 6f 77 73 |..Factor|yWindows|
|00000bc0| 5b 69 5d 20 3d 20 57 3b | 09 0d 0a 09 09 09 09 69 |[i] = W;|.......i|
|00000bd0| 2b 2b 3b 0d 0a 09 09 09 | 7d 0d 0a 09 09 09 6a 2b |++;.....|}.....j+|
|00000be0| 2b 3b 0d 0a 09 09 09 47 | 65 74 50 6c 61 79 65 72 |+;.....G|etPlayer|
|00000bf0| 4f 77 6e 65 72 28 29 2e | 47 65 74 4e 65 78 74 49 |Owner().|GetNextI|
|00000c00| 6e 74 44 65 73 63 28 53 | 65 72 76 65 72 4c 69 73 |ntDesc(S|erverLis|
|00000c10| 74 57 69 6e 64 6f 77 43 | 6c 61 73 73 2c 20 6a 2c |tWindowC|lass, j,|
|00000c20| 20 4e 65 78 74 57 69 6e | 64 6f 77 43 6c 61 73 73 | NextWin|dowClass|
|00000c30| 2c 20 4e 65 78 74 57 69 | 6e 64 6f 77 44 65 73 63 |, NextWi|ndowDesc|
|00000c40| 29 3b 20 0d 0a 09 09 7d | 0d 0a 09 7d 0d 0a 7d 0d |); ....}|...}..}.|
|00000c50| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 53 65 6c 65 |...funct|ion Sele|
|00000c60| 63 74 4c 41 4e 28 29 0d | 0a 7b 0d 0a 09 69 66 28 |ctLAN().|.{...if(|
|00000c70| 4c 41 4e 50 61 67 65 20 | 21 3d 20 4e 6f 6e 65 29 |LANPage |!= None)|
|00000c80| 0d 0a 09 7b 0d 0a 09 09 | 50 61 67 65 42 65 66 6f |...{....|PageBefo|
|00000c90| 72 65 4c 41 4e 20 3d 20 | 50 61 67 65 43 6f 6e 74 |reLAN = |PageCont|
|00000ca0| 72 6f 6c 2e 53 65 6c 65 | 63 74 65 64 54 61 62 3b |rol.Sele|ctedTab;|
|00000cb0| 0d 0a 09 09 50 61 67 65 | 43 6f 6e 74 72 6f 6c 2e |....Page|Control.|
|00000cc0| 47 6f 74 6f 54 61 62 28 | 4c 41 4e 50 61 67 65 2c |GotoTab(|LANPage,|
|00000cd0| 20 54 72 75 65 29 3b 0d | 0a 09 7d 0d 0a 7d 0d 0a | True);.|..}..}..|
|00000ce0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 53 65 6c 65 63 |..functi|on Selec|
|00000cf0| 74 49 6e 74 65 72 6e 65 | 74 28 29 0d 0a 7b 0d 0a |tInterne|t()..{..|
|00000d00| 09 69 66 28 50 61 67 65 | 42 65 66 6f 72 65 4c 41 |.if(Page|BeforeLA|
|00000d10| 4e 20 21 3d 20 4e 6f 6e | 65 20 26 26 20 50 61 67 |N != Non|e && Pag|
|00000d20| 65 43 6f 6e 74 72 6f 6c | 2e 53 65 6c 65 63 74 65 |eControl|.Selecte|
|00000d30| 64 54 61 62 20 3d 3d 20 | 4c 41 4e 50 61 67 65 29 |dTab == |LANPage)|
|00000d40| 0d 0a 09 09 50 61 67 65 | 43 6f 6e 74 72 6f 6c 2e |....Page|Control.|
|00000d50| 47 6f 74 6f 54 61 62 28 | 50 61 67 65 42 65 66 6f |GotoTab(|PageBefo|
|00000d60| 72 65 4c 41 4e 2c 20 54 | 72 75 65 29 3b 0d 0a 09 |reLAN, T|rue);...|
|00000d70| 50 61 67 65 42 65 66 6f | 72 65 4c 41 4e 20 3d 20 |PageBefo|reLAN = |
|00000d80| 4e 6f 6e 65 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |None;..}|....func|
|00000d90| 74 69 6f 6e 20 4e 65 77 | 4d 61 73 74 65 72 53 65 |tion New|MasterSe|
|00000da0| 72 76 65 72 28 73 74 72 | 69 6e 67 20 4d 29 0d 0a |rver(str|ing M)..|
|00000db0| 7b 0d 0a 09 6c 6f 63 61 | 6c 20 69 6e 74 20 69 2c |{...loca|l int i,|
|00000dc0| 20 6a 3b 0d 0a 09 6c 6f | 63 61 6c 20 73 74 72 69 | j;...lo|cal stri|
|00000dd0| 6e 67 20 4e 65 77 53 65 | 72 76 65 72 73 5b 31 30 |ng NewSe|rvers[10|
|00000de0| 5d 3b 0d 0a 09 6c 6f 63 | 61 6c 20 73 74 72 69 6e |];...loc|al strin|
|00000df0| 67 20 54 3b 0d 0a 09 6c | 6f 63 61 6c 20 62 6f 6f |g T;...l|ocal boo|
|00000e00| 6c 20 62 48 61 64 4e 65 | 77 53 65 72 76 65 72 3b |l bHadNe|wServer;|
|00000e10| 0d 0a 0d 0a 09 69 20 3d | 20 30 3b 0d 0a 09 77 68 |.....i =| 0;...wh|
|00000e20| 69 6c 65 28 4d 20 21 3d | 20 22 22 29 0d 0a 09 7b |ile(M !=| "")...{|
|00000e30| 0d 0a 09 09 6a 20 3d 20 | 49 6e 53 74 72 28 4d 2c |....j = |InStr(M,|
|00000e40| 20 43 68 72 28 31 33 29 | 29 3b 0d 0a 09 09 69 66 | Chr(13)|);....if|
|00000e50| 28 6a 20 21 3d 20 2d 31 | 29 0d 0a 09 09 7b 0d 0a |(j != -1|)....{..|
|00000e60| 09 09 09 54 20 3d 20 4c | 65 66 74 28 4d 2c 20 6a |...T = L|eft(M, j|
|00000e70| 29 3b 0d 0a 09 09 09 4d | 20 3d 20 4d 69 64 28 4d |);.....M| = Mid(M|
|00000e80| 2c 20 6a 2b 31 29 3b 0d | 0a 09 09 7d 0d 0a 09 09 |, j+1);.|...}....|
|00000e90| 65 6c 73 65 0d 0a 09 09 | 7b 0d 0a 09 09 09 54 20 |else....|{.....T |
|00000ea0| 3d 20 4d 3b 0d 0a 09 09 | 09 4d 20 3d 20 22 22 3b |= M;....|.M = "";|
|00000eb0| 0d 0a 09 09 7d 0d 0a 09 | 09 69 66 28 54 20 21 3d |....}...|.if(T !=|
|00000ec0| 20 22 22 29 0d 0a 09 09 | 09 4e 65 77 53 65 72 76 | "")....|.NewServ|
|00000ed0| 65 72 73 5b 69 2b 2b 5d | 20 3d 20 54 3b 0d 0a 09 |ers[i++]| = T;...|
|00000ee0| 7d 09 0d 0a 0d 0a 09 69 | 66 28 21 62 4b 65 65 70 |}......i|f(!bKeep|
|00000ef0| 4d 61 73 74 65 72 53 65 | 72 76 65 72 29 0d 0a 09 |MasterSe|rver)...|
|00000f00| 7b 0d 0a 09 09 66 6f 72 | 28 69 3d 30 3b 20 69 3c |{....for|(i=0; i<|
|00000f10| 32 30 3b 20 69 2b 2b 29 | 0d 0a 09 09 7b 0d 0a 09 |20; i++)|....{...|
|00000f20| 09 09 69 66 28 53 65 72 | 76 65 72 4c 69 73 74 4e |..if(Ser|verListN|
|00000f30| 61 6d 65 73 5b 69 5d 20 | 3d 3d 20 27 55 42 72 6f |ames[i] |== 'UBro|
|00000f40| 77 73 65 72 41 6c 6c 27 | 29 0d 0a 09 09 09 7b 0d |wserAll'|).....{.|
|00000f50| 0a 09 09 09 09 62 48 61 | 64 4e 65 77 53 65 72 76 |.....bHa|dNewServ|
|00000f60| 65 72 20 3d 20 46 61 6c | 73 65 3b 0d 0a 09 09 09 |er = Fal|se;.....|
|00000f70| 09 66 6f 72 28 6a 3d 30 | 3b 20 6a 3c 39 3b 20 6a |.for(j=0|; j<9; j|
|00000f80| 2b 2b 29 0d 0a 09 09 09 | 09 7b 0d 0a 09 09 09 09 |++).....|.{......|
|00000f90| 09 69 66 28 46 61 63 74 | 6f 72 79 57 69 6e 64 6f |.if(Fact|oryWindo|
|00000fa0| 77 73 5b 69 5d 2e 4c 69 | 73 74 46 61 63 74 6f 72 |ws[i].Li|stFactor|
|00000fb0| 69 65 73 5b 6a 5d 20 21 | 3d 20 4e 65 77 53 65 72 |ies[j] !|= NewSer|
|00000fc0| 76 65 72 73 5b 6a 5d 29 | 0d 0a 09 09 09 09 09 7b |vers[j])|.......{|
|00000fd0| 0d 0a 09 09 09 09 09 09 | 4c 6f 67 28 22 52 65 63 |........|Log("Rec|
|00000fe0| 65 69 76 65 64 20 6e 65 | 77 20 6d 61 73 74 65 72 |eived ne|w master|
|00000ff0| 20 73 65 72 76 65 72 20 | 5b 22 24 6a 24 22 5d 20 | server |["$j$"] |
|00001000| 66 72 6f 6d 20 55 70 64 | 61 74 65 53 65 72 76 65 |from Upd|ateServe|
|00001010| 72 3a 20 22 24 4e 65 77 | 53 65 72 76 65 72 73 5b |r: "$New|Servers[|
|00001020| 6a 5d 29 3b 0d 0a 09 09 | 09 09 09 09 46 61 63 74 |j]);....|....Fact|
|00001030| 6f 72 79 57 69 6e 64 6f | 77 73 5b 69 5d 2e 4c 69 |oryWindo|ws[i].Li|
|00001040| 73 74 46 61 63 74 6f 72 | 69 65 73 5b 6a 5d 20 3d |stFactor|ies[j] =|
|00001050| 20 4e 65 77 53 65 72 76 | 65 72 73 5b 6a 5d 3b 0d | NewServ|ers[j];.|
|00001060| 0a 09 09 09 09 09 09 46 | 61 63 74 6f 72 79 57 69 |.......F|actoryWi|
|00001070| 6e 64 6f 77 73 5b 69 5d | 2e 4c 69 73 74 46 61 63 |ndows[i]|.ListFac|
|00001080| 74 6f 72 69 65 73 5b 6a | 2b 31 5d 20 3d 20 22 22 |tories[j|+1] = ""|
|00001090| 3b 0d 0a 09 09 09 09 09 | 09 62 48 61 64 4e 65 77 |;.......|.bHadNew|
|000010a0| 53 65 72 76 65 72 20 3d | 20 54 72 75 65 3b 0d 0a |Server =| True;..|
|000010b0| 09 09 09 09 09 7d 0d 0a | 09 09 09 09 7d 0d 0a 09 |.....}..|....}...|
|000010c0| 09 09 09 69 66 28 62 48 | 61 64 4e 65 77 53 65 72 |...if(bH|adNewSer|
|000010d0| 76 65 72 29 0d 0a 09 09 | 09 09 7b 0d 0a 09 09 09 |ver)....|..{.....|
|000010e0| 09 09 69 66 28 46 61 63 | 74 6f 72 79 57 69 6e 64 |..if(Fac|toryWind|
|000010f0| 6f 77 73 5b 69 5d 2e 62 | 48 61 64 49 6e 69 74 69 |ows[i].b|HadIniti|
|00001100| 61 6c 52 65 66 72 65 73 | 68 29 0d 0a 09 09 09 09 |alRefres|h)......|
|00001110| 09 09 46 61 63 74 6f 72 | 79 57 69 6e 64 6f 77 73 |..Factor|yWindows|
|00001120| 5b 69 5d 2e 52 65 66 72 | 65 73 68 28 46 61 6c 73 |[i].Refr|esh(Fals|
|00001130| 65 2c 20 54 72 75 65 29 | 3b 0d 0a 09 09 09 09 09 |e, True)|;.......|
|00001140| 46 61 63 74 6f 72 79 57 | 69 6e 64 6f 77 73 5b 69 |FactoryW|indows[i|
|00001150| 5d 2e 53 61 76 65 43 6f | 6e 66 69 67 28 29 3b 0d |].SaveCo|nfig();.|
|00001160| 0a 09 09 09 09 7d 0d 0a | 09 09 09 7d 0d 0a 09 09 |.....}..|...}....|
|00001170| 7d 0d 0a 09 7d 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |}...}..}|....func|
|00001180| 74 69 6f 6e 20 4e 65 77 | 49 52 43 53 65 72 76 65 |tion New|IRCServe|
|00001190| 72 28 73 74 72 69 6e 67 | 20 53 29 0d 0a 7b 0d 0a |r(string| S)..{..|
|000011a0| 09 55 42 72 6f 77 73 65 | 72 49 52 43 57 69 6e 64 |.UBrowse|rIRCWind|
|000011b0| 6f 77 28 49 52 43 2e 50 | 61 67 65 29 2e 53 79 73 |ow(IRC.P|age).Sys|
|000011c0| 74 65 6d 50 61 67 65 2e | 53 65 74 75 70 43 6c 69 |temPage.|SetupCli|
|000011d0| 65 6e 74 2e 4e 65 77 49 | 52 43 53 65 72 76 65 72 |ent.NewI|RCServer|
|000011e0| 28 53 29 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |(S);..}.|...funct|
|000011f0| 69 6f 6e 20 50 61 69 6e | 74 28 43 61 6e 76 61 73 |ion Pain|t(Canvas|
|00001200| 20 43 2c 20 66 6c 6f 61 | 74 20 58 2c 20 66 6c 6f | C, floa|t X, flo|
|00001210| 61 74 20 59 29 0d 0a 7b | 0d 0a 09 44 72 61 77 53 |at Y)..{|...DrawS|
|00001220| 74 72 65 74 63 68 65 64 | 54 65 78 74 75 72 65 28 |tretched|Texture(|
|00001230| 43 2c 20 30 2c 20 30 2c | 20 57 69 6e 57 69 64 74 |C, 0, 0,| WinWidt|
|00001240| 68 2c 20 57 69 6e 48 65 | 69 67 68 74 2c 20 54 65 |h, WinHe|ight, Te|
|00001250| 78 74 75 72 65 27 42 6c | 61 63 6b 54 65 78 74 75 |xture'Bl|ackTextu|
|00001260| 72 65 27 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |re');..}|....func|
|00001270| 74 69 6f 6e 20 52 65 73 | 69 7a 65 64 28 29 0d 0a |tion Res|ized()..|
|00001280| 7b 0d 0a 09 53 75 70 65 | 72 2e 52 65 73 69 7a 65 |{...Supe|r.Resize|
|00001290| 64 28 29 3b 0d 0a 09 50 | 61 67 65 43 6f 6e 74 72 |d();...P|ageContr|
|000012a0| 6f 6c 2e 53 65 74 53 69 | 7a 65 28 57 69 6e 57 69 |ol.SetSi|ze(WinWi|
|000012b0| 64 74 68 2c 20 57 69 6e | 48 65 69 67 68 74 29 3b |dth, Win|Height);|
|000012c0| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|000012d0| 53 61 76 65 43 6f 6e 66 | 69 67 73 28 29 0d 0a 7b |SaveConf|igs()..{|
|000012e0| 0d 0a 09 53 61 76 65 43 | 6f 6e 66 69 67 28 29 3b |...SaveC|onfig();|
|000012f0| 0d 0a 7d 0d 0a 0d 0a 00 |                         |..}.....|        |
+--------+-------------------------+-------------------------+--------+--------+